unit devMonitorTypes;

interface

uses Classes, Windows;
type
  TdevMonitorChangeType = (mctChanged, mctDeleted);
  TdevMonitorChange = procedure(Sender: TObject; ChangeType: TdevMonitorChangeType; Filename: string) of object;

implementation

end.
